home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / amok_lha / amok29.lha / CreateIcons / Lists.def < prev    next >
Text File  |  1993-08-15  |  267b  |  17 lines
  1. DEFINITION Lists;
  2.  
  3. TYPE
  4.   NodePtr = POINTER TO Node;
  5.   Node = RECORD
  6.            next,prev: NodePtr;
  7.          END;
  8.  
  9. PROCEDURE Add(VAR head: NodePtr; VAR el: Node);
  10.  
  11. PROCEDURE Rem(VAR head: NodePtr; VAR el: Node);
  12.  
  13. PROCEDURE Empty(head: NodePtr): BOOLEAN;
  14.  
  15. END Lists.
  16.  
  17.